home *** CD-ROM | disk | FTP | other *** search
/ HPAVC / HPAVC CD-ROM.iso / pc / CONTRSRC.ZIP / SRC / GOPI / TRANSF1.INC < prev    next >
Encoding:
Text File  |  1994-11-17  |  797 b   |  34 lines
  1. ;*****************************************************************************
  2. transf1  macro
  3.          local bcl1
  4.          MPUSH ax,bx,cx,dx,ds
  5. ;**************
  6. ;agrandissement
  7. ;spécifié par agr(byte)
  8. ;bousille:ax,bx,cx,dx
  9. ;**************
  10.          xor  bx,bx
  11.          mov  cx,nbdots
  12.          mov  dl,agr
  13.          push gs
  14.          pop  ds 
  15. bcl1:
  16.          mov  al,BYTE PTR XV[bx]
  17.          imul dl
  18.          mov  WORD PTR XV[bx],ax
  19.  
  20.          mov  al,BYTE PTR YV[bx]
  21.          imul dl
  22.          mov  WORD PTR YV[bx],ax 
  23.  
  24.          mov  al,BYTE PTR zV[bx]
  25.          imul dl
  26.          mov WORD PTR zV[bx],ax
  27.  
  28.          add  bx,4
  29.  
  30.          dec  cx
  31.          jnz  bcl1
  32.          MPOP ax,bx,cx,dx,ds
  33. endm
  34. ;*****************************************************************************